;
; Adaptado para ser montado pelo SJASMPLUS. Unificado codigo do MSX2 e MSX2+
; Usado constantes para os numeros de portas de I/O
; por Fabio Belavenuto e Leonard Oliveira @ 2014
;

	ORG	01B94H

	JR	J1BAC

;	Subroutine	handler DEAD key
;	Inputs		-
;	Outputs		________________________
;	Remark		never called, because DEAD key is already intercepted by patch J10B7

J1B96:	LD	A,(NEWKEY+6)
	LD	E,A
	OR	0FEH			; SHIFT key status (rest of bits 1)
	BIT	4,E
	JR	NZ,J1BA2		; CODE not pressed, use SHIFT
	AND	0FDH			; reset b1
J1BA2:	CPL	
	INC	A
	LD	(KANAST),A		; set DEAD status (001H-004H)
	JP	J0F64			; make keyclick


; *************************************
; END OF GERMAN KEYBOARD HANDLER
; *************************************